home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 1995 #5 & #6 / Amiga Plus CD - 1995 - No. 5 and 6.iso / pd / serien / purity / nr.37 / battclock / source / bclockl.p next >
Text File  |  1994-09-17  |  580b  |  25 lines
  1.  
  2.  
  3.  
  4. { simple reading of the battclock. (KP2.12/OS2 or MaxonPASCAL3)
  5.  
  6.   using my UNITS: BattclockLight (V1.04) and Utility (V0.2)
  7.                   this is a test for AmigaDOS
  8.  
  9.   © & P by PackMAN, c/o Falk Zühlsdorff,
  10.                     Lindenberg 66, D-98693 Ilmenau/Thuringia
  11.  
  12.   see © of my UNITS...                                               }
  13.  
  14. Program TimeLight;
  15.  
  16. USES BattclockLight;
  17.  
  18. BEGIN
  19.  IF getbattclockL THEN writeln(battclockdate,' ',battclocktime)
  20.                   ELSE writeln('no battclock found...');
  21.  
  22.  IF Utilitybase<>NIL THEN CloseLibrary(UtilityBase);
  23. END.
  24.  
  25.